Przekrój ostrosłupa prawidłowego 
czworokątnego płaszczyzną równo-
ległą do podstawy ostrosłupa.

Opracował: Piotr Leszczyński

Przesuń dowolnie punk E wzdłuż wysokości SS'.

POKAŻ PŁASZCZYZNĘ PRZEKROJU

Pole przekroju =

Obwód przekroju =

a = 6 (slider from 0.1 to 10, step 0.1)
h = 6 (slider from 0.1 to 10, step 0.1)
α = 0.7684684696531032 rad (slider from 0 to atan(((2 * h)) / a), step 0.01°)
A: (a / 2, a / 2)
B = Mirror(A, yAxis)
C = Mirror(B, xAxis)
D = Mirror(C, yAxis)
q1, a_1, b, c, d = Polygon(A, B, C, D)
S: (0, 0, h)
e, powierzchniaABS, powierzchniaBCS, powierzchniaCDS, powierzchniaADS, krawędźAS, krawędźBS, krawędźCS, krawędźDS = Pyramid(q1, S)
S' = Midpoint(A, C)
f = Segment(S', S)
E = Point(f)
g = Plane(E, q1)
F = Intersect(krawędźDS, g)
G = Intersect(krawędźAS, g)
H = Intersect(krawędźBS, g)
I = Intersect(krawędźCS, g)
q2, i, f_1, g_1, h_1 = Polygon(I, F, G, H)
p1 = true
p2 = true
p3 = true
tekst4: "" + q2 + ""
tekst5: "" + ((h_1 * 4)) + ""